home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic Toolbox
/
Visual Basic Toolbox (P.I.E.)(1996).ISO
/
network
/
netprn
/
netprint.frm
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1991-09-06
|
5KB
|
100 lines
Form1
NetPrint
Form1,
Frame2
Available Printers and Ports
NetPrinters
PrintPorts
Connect
&Connect
Frame1
Linked Printers
LinkedPrinters
Disconnect
&Disconnect
Form_Click
WNetGetConnection
LocalDev
rmtname
buffsize
Form_Load
LinkedPrinters_Click
linkedPrinters
printports
selstart
GetPrivateProfileInt(
lpApplicationNameA
lpKeyName
nDefault
lpFileNamey
GetPrivateProfileString
lpDefault
lpReturnedString
nSize
KeyName
NULL!
Default
App_Name
Key_Vall
Ini_Name
appname
Def_Val
netprinters-
WNetAddConnection
NetPath
Password
WNetCancelConnection
Force
Connect_Click
findlinks
listindex
SendMessage
wParam
lParam$
GetFocus
PutFocusz
WM_USER
LB_RESETCONTENT
ClearListBox
Ctrl1
hWndOld
Link_PrinterR
Link_Port
ClearList
Disconnect_Click
Linked_Port
Network
Connection
already
exists
Frame2_DragDrop
Source
NetPrint has been placed in the public domain by Art Krumsee
CompuServe ID 76702,1526. Internet address art.krumsee@osu.edu
User}
User}
Kernel
SetFocus
Form_Load
NetPrint has been placed in the public domain by Art Krumsee
CompuServe ID 76702,1526. Internet address art.krumsee@osu.edu
Get list of available printers from NETPRINT.ini
Netprint
No Printers Defined"
netprint.ini
Connect_Click
x% = MsgBox(printports.text)
You must select a printer and a port and then press Connect.
Password required. Could not connect printer.
Network Connection to that port already exists."
Network Link Failed"
findlinks
Find out which printer ports are already linked
ClearListBox
Disconnect_Click
x% = MsgBox(printports.text)
You must select a linked printer and then press Disconnect."
This printer port was not connected to a network device.
Open files prevented the completion of this operation"
Network Disconnect Failed"